home *** CD-ROM | disk | FTP | other *** search
/ Mac Easy 2010 May / Mac Life Ubuntu.iso / casper / filesystem.squashfs / usr / share / perl / 5.10.0 / ExtUtils / CBuilder / Platform / cygwin.pm < prev    next >
Encoding:
Perl POD Document  |  2009-06-26  |  684 b   |  31 lines
  1. package ExtUtils::CBuilder::Platform::cygwin;
  2.  
  3. use strict;
  4. use File::Spec;
  5. use ExtUtils::CBuilder::Platform::Unix;
  6.  
  7. use vars qw($VERSION @ISA);
  8. $VERSION = '0.21';
  9. @ISA = qw(ExtUtils::CBuilder::Platform::Unix);
  10.  
  11. sub link_executable {
  12.   my $self = shift;
  13.   # $Config{ld} is set up as a special script for building
  14.   # perl-linkable libraries.  We don't want that here.
  15.   local $self->{config}{ld} = 'gcc';
  16.   return $self->SUPER::link_executable(@_);
  17. }
  18.  
  19. sub link {
  20.   my ($self, %args) = @_;
  21.  
  22.   $args{extra_linker_flags} = [
  23.     File::Spec->catdir($self->perl_inc(), 'libperl.dll.a'),
  24.     $self->split_like_shell($args{extra_linker_flags})
  25.   ];
  26.  
  27.   return $self->SUPER::link(%args);
  28. }
  29.  
  30. 1;
  31.